#INCLUDE "PROTHEUS.CH"
#INCLUDE "RWMAKE.CH"

/*
+----------------------------------------------------------------------------+
!                             FICHA TECNICA DO PROGRAMA                      !
+----------------------------------------------------------------------------+
!Programa          ! MA650VLD                                                !
+------------------+---------------------------------------------------------+
!Descricao         ! Ponto de Entrada para Verifica o bloqueio de NUMERO+ITEM!
!                  ! repetidos ou NUMERO+ITEM+SEQUENCIA repetidos na OP.     !
+------------------+---------------------------------------------------------+
!Autor             ! TSC    - Peterson                                       !
+------------------+---------------------------------------------------------+
!Data de Criacao   ! 03/08/10                                                !
+------------------+---------------------------------------------------------+
!   ATUALIZACOES                                                             !
+-------------------------------------------+-----------+-----------+--------+
!   Descricao detalhada da atualizacao      !Nome do    ! Analista  !Data da !
!                                           !Solicitante! Respons.  !Atualiz.!
+-------------------------------------------+-----------+-----------+--------+
!                                           !           !           !        !
!                                           !           !           !        !
+-------------------------------------------+-----------+-----------+--------+
!                                           !           !           !        !
!                                           !           !           !        !
+-------------------------------------------+-----------+-----------+--------+
*/

***********************
User Function MA650VLD()
***********************
***********************

/*
Verifica o bloqueio de NUMERO+ITEM repetidos ou NUMERO+ITEM+SEQUENCIA repetidos

Valor numerico 1 ou 2:
1 - Sistema nao permitira a digitacao de OPs com NUMERO+ITEM 
2 - Sistema nao permitira a digitacao de OPs com NUMERO+ITEM+SEQUENCIA permitidos 
*/
Return(2)

